home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 126-150 / disk_143 / rim / rimsrcami.arc / LXCON.BLK < prev    next >
Text File  |  1988-01-05  |  1KB  |  23 lines
  1. C
  2. C     THIS COMMON CONTAINS CONSTANTS FOR THE LXLREC COLLECTION OF
  3. C     ROUTINES.  THESE ARE SET BY A DATA STATEMENT IN LXGENR.
  4. C     NOTE THAT SOME CONSTANTS AREN'T.  BLANK,CONT,DOLLAR,SEMI,
  5. C     QUOTES,COMMA MAY BE CHANGED BY USER DIRECTIVES. THAT'S WHY
  6. C     THERE IS BOTH BLANKS AND BLANK, AND PLUS AND CONT.
  7. C     NWORD,MITEM,MCHAR AND NCPW CONTAIN MACHINE CONSTANTS.
  8. C     NWORD....NUMBER OF WORDS TO HOLD MCHAR
  9. C     MITEM....MAX NUMBER OF ITEMS
  10. C     MCHAR....MAX TOTAL NUMBER OF TEXT CHARACTERS
  11. C     NCPW.....NUMBER OF CHARACTERS PER WORD
  12. C     ENDCOM...CHARACTER WHICH TERMINATES CURRENT COMMENT
  13. C
  14. C
  15.       COMMON /LXCON/ DIGITS(10),MINUS,PLUS,POINT,DOLLAR,SEMI,CONT,
  16.      X               STAR,LPAREN,RPAREN,QUOTES,BLANK,TEXT,REAL,INTGER,
  17.      X               SAME,ALLSAM,REPEAT,GENRAT,EQUALS,COMMA,E,BLANKS,
  18.      X               NWORD,MITEM,MCHAR,NCPW,NULL,ENDCOM,SLASH
  19.       INTEGER DIGITS,MINUS,PLUS,POINT,DOLLAR,SEMI,CONT
  20.       INTEGER STAR,LPAREN,RPAREN,QUOTES,BLANK,TEXT,REAL,INTGER
  21.       INTEGER SAME,ALLSAM,REPEAT,GENRAT,EQUALS,COMMA,E,BLANKS
  22.       INTEGER NWORD,MITEM,MCHAR,NCPW,ENDCOM,SLASH
  23.